﻿Imports DTO
Imports DAO
Public Class BangCapBUS

    Public Function CapNhatBangCap(ByVal sql As String) As Integer
        Dim dao As New BangCapDAO()
        Return dao.CapNhatBangCap(sql)
    End Function

    Public Function ThemBangCap(ByVal sql As String) As Integer
        Dim dao As New BangCapDAO()
        Return dao.ThemBangCap(sql)
    End Function

    Public Function LayDSBangCap() As List(Of BangCapDTO)
        Dim dao As New BangCapDAO()
        Return dao.LayDSBangCap()
    End Function
End Class
